TDiamondPad

This VCL a 4-way spinner type control.

PROPERTIES

Delay:        If the Interval property is set, the OnFire event
              will fire every Interval# of milliseconds, as long
              as the mouse is pressed down on the control.  The
              Delay sets a delay in milliseconds before that
              starts to happen.

Interval:     If the Interval property is set, the OnFire event
              will fire every Interval# of milliseconds, as long
              as the mouse is pressed down on the control.

Size:         Two sizes of DiamondPads are available dsSmall (32x32)
              and dsLarge (48x48).


EVENTS

OnFire:       The OnFire event will be triggered immediately upon
              the user clicking the mouse on the control, and, if
              the Interval property is set, every Interval# of
              milliseconds, starting after a delay of Delay 
              milliseconds.  When this event is called, you will
              be passed an ArrowPressed value which will be one of 
              the following:
              bpTop, bpRight, bpBottom, or bpLeft.



Installing TDiamondPad

To install this VCL, copy DPAD.DCU, DPAD.DCR and DIAMONDS.RES to the
directory where you have your other shareware controls.  Then, 
from Delphi's main menu, select Options|Install Components.  In the
dialog, click on the Add... button, then Browse... and change to the 
drive/directory where you stored the above two files.  Select 
DPAD.DCU and click OK, then OK again.

Using TDiamondPad

To use this control, simply place it on your form, and set the 
Size, Interval and Delay properties.

Sample Event Procedure:

procedure TForm1.DiamondPad1Fire(Sender: TObject; ArrowPressed: TPressed);
begin
     case ArrowPressed of
     bpTop:    {Add code here};
     bpBottom: {Add code here};
     bpLeft:   {Add code here};
     bpRight:  {Add code here};
     end;
end;

Support:

Send comments and questions to:

Zane Rathwick
Indigo Software

CIS: 74633,1314
AOL: ZaneR
Internet:   ZaneR@aol.com
U.S. Mail:  Zane Rathwick
            Indigo Software
            4240 Park Newport Suite 308
            Newport Beach, CA 92660

Registering TDiamondPad

To register TDiamondPad and receive source code, send $10 (+$2 S&H) to:

Indigo Software
4240 Park Newport # 308
Newport Beach, CA 92660

You can save the $2 shipping fee by specifying a Compuserve or AOL 
account to have your control sent to instead of by mail.